home *** CD-ROM | disk | FTP | other *** search
/ Experimental BBS Explossion 3 / Experimental BBS Explossion III.iso / c / pcw.zip / QBLKWRT.C < prev    next >
Text File  |  1990-01-16  |  968b  |  26 lines
  1. /**********************************************************/
  2. /* File Id.                  Qblkwrt.C                    */
  3. /* Author.                   Stan Milam.                  */
  4. /* Date Written.             07/03/89.                    */
  5. /*                                                        */
  6. /*           (c) Copyright 1989-90 by Stan Milam          */
  7. /*                                                        */
  8. /* Comments: Used to write an array of strings to the     */
  9. /* screen very quickly.  The array of pointers must be    */
  10. /* NULL terminated.                                       */
  11. /**********************************************************/
  12.  
  13. #include <stdio.h>
  14. #include "pcwproto.h"
  15.  
  16. int q_block_write(int row, int col, int fclr, int bclr, char *strs[]) {
  17.  
  18.   int lcv, rc;
  19.  
  20.   for (lcv = 0; strs[lcv] != NULL; lcv++) {
  21.      rc = qputs(row+lcv,col,fclr,bclr,strs[lcv]);
  22.      if (!rc) return(rc);
  23.   }
  24.   return(1);
  25. }
  26.